object frmVerCC: TfrmVerCC Left = 274 Top = 138 BorderStyle = bsNone Caption = 'frmVerCC' ClientHeight = 399 ClientWidth = 677 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnKeyPress = FormKeyPress OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Shape1: TShape Left = 0 Top = 0 Width = 677 Height = 399 Align = alClient end object Label5: TLabel Left = 18 Top = 8 Width = 48 Height = 16 Caption = 'Label5' Font.Charset = DEFAULT_CHARSET Font.Color = clGray Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label186: TLabel Left = 492 Top = 325 Width = 35 Height = 15 Caption = 'Saldo:' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label163: TLabel Left = 548 Top = 325 Width = 100 Height = 15 Alignment = taRightJustify AutoSize = False Caption = 'Label163' Color = clBlack Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] ParentColor = False ParentFont = False ParentShowHint = False ShowHint = True Transparent = True end object Label164: TLabel Left = 548 Top = 350 Width = 100 Height = 15 Alignment = taRightJustify AutoSize = False Caption = 'Label164' Font.Charset = ANSI_CHARSET Font.Color = clNavy Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Transparent = True end object Label2: TLabel Left = 16 Top = 352 Width = 353 Height = 29 Caption = 'Conta Corrente do Cond�mino' Font.Charset = ANSI_CHARSET Font.Color = clGray Font.Height = -24 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label1: TLabel Left = 352 Top = 328 Width = 32 Height = 13 Caption = 'Label1' Transparent = True Visible = False end object DBGrid6: TDBGrid Left = 16 Top = 30 Width = 649 Height = 289 Color = clWhite Ctl3D = False DataSource = DataSource1 FixedColor = 13551795 Options = [dgTitles, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit] ParentCtl3D = False ReadOnly = True TabOrder = 0 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] Columns = < item Expanded = False FieldName = 'Data' Title.Alignment = taCenter Width = 70 Visible = True end item Expanded = False FieldName = 'Tipo Documento' Title.Alignment = taCenter Title.Caption = 'Documento' Width = 120 Visible = True end item Expanded = False FieldName = 'N�' Title.Alignment = taCenter Title.Caption = 'N�mero' Width = 80 Visible = True end item Expanded = False FieldName = 'Descri��o' Title.Caption = 'Referente a' Width = 160 Visible = True end item Expanded = False FieldName = 'D�bito' Title.Alignment = taCenter Width = 100 Visible = True end item Expanded = False FieldName = 'Cr�dito' Title.Alignment = taCenter Width = 100 Visible = True end> end object BitBtn1: TBitBtn Left = 576 Top = 368 Width = 75 Height = 25 Caption = '&OK' TabOrder = 1 Kind = bkOK end object Table1: TTable DatabaseName = 'Database1' Filtered = True TableName = 'CCC.db' Left = 96 Top = 8 object Table1ID: TAutoIncField FieldName = 'ID' ReadOnly = True end object Table1Condmino: TIntegerField FieldName = 'Cond�mino' end object Table1Documento: TIntegerField FieldName = 'Documento' end object Table1Dbito: TFloatField FieldName = 'D�bito' DisplayFormat = '###,###,##0.#0' end object Table1Crdito: TFloatField FieldName = 'Cr�dito' DisplayFormat = '###,###,##0.#0' end object Table1Data: TDateField FieldName = 'Data' end object Table1TipoDocumento: TStringField FieldName = 'Tipo Documento' end object Table1N: TIntegerField FieldName = 'N�' end object Table1Descrio: TStringField FieldName = 'Descri��o' Size = 50 end end object DataSource1: TDataSource DataSet = Table1 Left = 128 Top = 8 end object Table2: TTable DatabaseName = 'Database1' Filtered = True TableName = 'CCContactos.DB' Left = 160 Top = 8 object Table2ID: TAutoIncField FieldName = 'ID' ReadOnly = True end object Table2Contacto: TIntegerField FieldName = 'Contacto' end object Table2Documento: TIntegerField FieldName = 'Documento' end object Table2Dbito: TFloatField FieldName = 'D�bito' end object Table2Crdito: TFloatField FieldName = 'Cr�dito' end object Table2Data: TDateField FieldName = 'Data' end object Table2TipoDocumento: TStringField FieldName = 'Tipo Documento' end object Table2N: TIntegerField FieldName = 'N�' end object Table2Descrio: TStringField FieldName = 'Descri��o' Size = 50 end object Table2Automtico: TBooleanField FieldName = 'Autom�tico' end end object Table3: TTable Filtered = True Left = 200 Top = 8 end end